How Would You Survive?/How Would You Survive (1995)(Grolier)[Mac-PC].iso/mac/AZTECW.DIR/01702_Script_Workshops

Text File | 1995-09-12 | 5KB | 187 lines

global gQuest, gBeenClicked, gHouseIsOpen

on AWorkshopsRollovers1
  set gBeenClicked = 0
  if (not(CheckClickedStatus(gQuest))) then
    if rollover(9) then
      repeat while rollover(9)
        AztecCursor
        puppetsprite 15, true
        set the locH of sprite 15 to 487
        set the locV of sprite 15 to 285
        updatestage
        if the mousedown then
          set GBeenClicked = 1
        else
          if gBeenClicked = 1 then
            repeat while gBeenClicked = 1
              AnimateLoopToFro 9, 473, 8, "SA220801.AIF", 1
            end repeat
          end if
        end if
      end repeat
      set the locH of sprite 15 to 987
      puppetsprite 15, false
      updatestage
    else
      if rollover(8) then
        repeat while rollover(8)
          AztecCursor
          if the mousedown then
            set GBeenClicked = 1
          else
            if gBeenClicked = 1 then
              repeat while gBeenClicked = 1
                puppetsprite 10, true
                set the locH of sprite 10 to 506
                set the locV of sprite 10 to 318
                updatestage
                AnimateLoopToFro 10, 525, 3, 0, 2
              end repeat
              set the locH of sprite 10 to 900
              puppetsprite 10, false
              updatestage
            end if
          end if
        end repeat
      else
        if rollover(6) then
          repeat while rollover(6)
            AztecCursor
            puppetsprite 16, true
            set the locH of sprite 16 to 383
            set the locV of sprite 16 to 263
            updatestage
            if the mousedown then
              set GBeenClicked = 1
            else
              if gBeenClicked = 1 then
                repeat while gBeenClicked = 1
                  AnimateLoopToFro 6, 468, 4, 0, 1
                end repeat
              end if
            end if
          end repeat
          set the locH of sprite 16 to 983
          puppetsprite 16, false
          updatestage
        else
          if rollover(11) then
            ArrowCursor
            repeat while rollover(11)
              set the locH of sprite 12 to 424
              set the locV of sprite 12 to 215
              updatestage
            end repeat
          else
            if rollover(13) then
              ArrowCursor
              repeat while rollover(13)
                set the locH of sprite 14 to 300
                set the locV of sprite 14 to 233
                updatestage
              end repeat
            else
              if rollover(40) then
                HandCursor
              else
                if rollover(41) then
                  HandCursor
                else
                  if rollover(42) then
                    HandCursor
                  else
                    ArrowCursor
                  end if
                end if
              end if
            end if
          end if
        end if
      end if
    end if
  end if
  RandomQuestion(gQuest)
end

on AWorkshopsRollovers2
  set gBeenClicked = 0
  if (not(CheckClickedStatus(gQuest))) then
    if rollover(13) then
      repeat while rollover(13)
        AztecCursor
        puppetsprite 14, true
        set the locH of sprite 14 to 407
        set the locV of sprite 14 to 319
        updatestage
        if the mousedown then
          set GBeenClicked = 1
        else
          if gBeenClicked = 1 then
            repeat while gBeenClicked = 1
              AnimateLoopFastest 13, 487, 4, "SA221601.AIF", 2
            end repeat
          end if
        end if
      end repeat
      set the locH of sprite 14 to 907
      puppetsprite 14, false
      updatestage
    else
      if rollover(9) then
        ArrowCursor
        repeat while rollover(9)
          set the locH of sprite 10 to 259
          set the locV of sprite 10 to 306
          updatestage
        end repeat
        set the locH of sprite 10 to 959
        updatestage
      else
        if rollover(11) then
          AztecCursor
          repeat while rollover(11)
            set the locH of sprite 12 to 271
            set the locV of sprite 12 to 341
            updatestage
            if the mousedown then
              puppetsound "SA221200.AIF"
            end if
          end repeat
          set the locH of sprite 12 to 971
          puppetsound 0
          Updatestage
        else
          if rollover(15) then
            ArrowCursor
            repeat while rollover(15)
              set the locH of sprite 16 to 360
              set the locV of sprite 16 to 242
              updatestage
            end repeat
          else
            if rollover(39) then
              HandCursor
            else
              if rollover(41) then
                HandCursor
              else
                if rollover(42) then
                  HandCursor
                else
                  ArrowCursor
                end if
              end if
            end if
          end if
        end if
      end if
    end if
  end if
  RandomQuestion(gQuest)
end